﻿Public Class PedidoNegocio

    Public Function inserPedido(
                                ByVal idusuario As Integer,
                                ByVal fechaPedido As String,
                                ByVal estado As String,
                                ByVal total As Integer
                                ) As pedido



        Dim modelo As New pedido()


        modelo.idUsuario = idusuario
        modelo.fechaPedido = fechaPedido
        modelo.estado = estado
        modelo.total = total



        Dim dao As New PedidoDAO

        Return dao.insertarPedid(modelo)

    End Function
    Public Function listar() As Collection
        Dim dao As New PedidoDAO
        Return dao.listar()
    End Function
End Class
